home *** CD-ROM | disk | FTP | other *** search
/ Dino Crisis Digital Press Kit / Dino Crisis Digital Press Kit.iso / mac / t / 00155_Script_155 < prev    next >
Text File  |  1999-08-20  |  465b  |  13 lines
  1. on mousedown
  2.   put the spritenum of sprite the clickon into x
  3.   
  4.   set x = x - 20
  5.   put the membernum of sprite x into kkk
  6.   put the name of member kkk into field "name"
  7.   ------------
  8.   put FileSaveAsDialog("Hard Disk:Desktop Folder",field "name" & ".jpg","Save image " & field "name" & ".jpg as:") into field "outPath"
  9.   ------------
  10.   put field "outPath" into saveFile
  11.   CopyFile(the pathname & "images:art:" & field "name" & ".jpg", saveFile)
  12.   
  13. end